Top 10k strings from Ajedrez (1985)(Patxi Projects)(es).tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [TAP] /

Back to the directory listing

  14 (t(la,ca,1
   4 ;"          ";
   4 )+("siete"
   4 )+("kuatro"
   4 )+("cinko"
   3 v$="te ekibokas":
   3 *(b$="2")+(b$="1"),(f=1
   2 b$="    ":
   2 ;"        ";
   2 ;"        ":
   2 )*(b$="2")+4
   1 v$="un momento":
   1 v$="torre  uno":
   1 v$="tablas":
   1 v$="rreina  kuatrro":
   1 v$="le tokaalas rrojas":
   1 v$="le tokaalas berrdes":
   1 v$="larrgo  dos    korrto  uno":
   1 v$="kabalyo  dos":
   1 v$="ganan rojas":
   1 v$="ganan berrdes":
   1 v$="enrroke    enrroke":
   1 v$="elige":
   1 v$="arriba  dos    abajo  uno":
   1 v$="alfil  tres":
   1 v$="ajedrez":
   1 r(o,f)=r(o,f)+1
   1 r(o,f)=((o=1
   1 r(l,c)=((l=1
   1 p=p+(l>la)-(l<la):
   1 p=(l=la)*(c>ca)*(ca+1
   1 m=m+(c>ca)-(c<ca)
   1 le tokaalas berrdesB
   1 la)*p+(l=la)*la,(ca
   1 c)*p+(ca=c)*ca,1
   1 a$="ESTE ES UN PROGRAMA PARA JUGAR  AL AJEDREZ ENTRE DOS JUGADORES.                                 LA JUGADA A REALIZAR SE ESCOGE  EN DOS PASOS. EN EL PRIMERO,    MEDIANTE DOS ASTERISCOS MOVILES SE ELIGE LA FICHA A MOVER.      UNA VEZ SE HA ESCOGIDO, SE PULSA~SPACE~ Y SE ELIGE LA CASILLA ENLA QUE SE VA A COLOCAR.         ADELANTE, Y... QUE GANE EL MEJOR"
   1 VOZ       L
   1 ESTE ES UN PROGRAMA PARA JUGAR  AL AJEDREZ ENTRE DOS JUGADORES.                                 LA JUGADA A REALIZAR SE ESCOGE  EN DOS PASOS. EN EL PRIMERO,    MEDIANTE DOS ASTERISCOS MOVILES SE ELIGE LA FICHA A MOVER.      UNA VEZ SE HA ESCOGIDO, SE PULSA~SPACE~ Y SE ELIGE LA CASILLA ENLA QUE SE VA A COLOCAR.         ADELANTE, Y... QUE GANE EL MEJOR
   1 AJEDREZ   V>
   1 ;"VERDES":
   1 ;"VERDES    ":
   1 ;"UN MOMENTO":
   1 ;"TORRE..1":
   1 ;"TABLAS":
   1 ;"ROJAS    ":
   1 ;"REINA..4":
   1 ;"LARGO 2  ";
   1 ;"JUEGAN";
   1 ;"JUEGAN ";
   1 ;"ELIGE:":
   1 ;"CORTO 1  ":
   1 ;"CABALLO..2":
   1 ;"ARRIBA 2";
   1 ;"ALFIL..3":
   1 ;"AJEDREZ":
   1 ;"ABAJO 1":
   1 ;"   AJEDREZ   ":
   1 ;"         ";
   1 ;"         ":
   1 ;"          "
   1 -f))=r(t(l,c,1
   1 *-(t(l,c-1
   1 )=t(la,ca,3
   1 )=t(la,ca,1
   1 )+(la=l)*(ca>c)*(c+1
   1 )+(l=la)*(ca>c)*(ca-1
   1 )+(ca=c)*(la>l)*(la-1
   1 )+(ca=c)*(la>l)*(l+1
   1 )+(ca=c)*(l>la)*(la+1
   1 )+(ca=c)*(l>la)*(l-1
   1 )*(b$="1")+6
   1 )*(b$="1")
   1 (t(la,ca,2
   1 (l=la)*(c>ca)*(c-1
   1  PATXI PROJECTS 1985                                                                          
   1                                                                      PARA 2 JUGADORES CON            SINTETIZADOR DE VOZ.                                            
   1